home *** CD-ROM | disk | FTP | other *** search
- object frmArc2Arc: TfrmArc2Arc
- Left = 337
- Top = 242
- BorderIcons = [biSystemMenu, biMinimize]
- BorderStyle = bsDialog
- Caption = 'UltimateZip Archive Converter'
- ClientHeight = 383
- ClientWidth = 434
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = True
- OnClose = FormClose
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object imgLed: TImage
- Left = 625
- Top = 447
- Width = 10
- Height = 10
- AutoSize = True
- Center = True
- Picture.Data = {<image000.bmp>}
- Visible = False
- end
- object Label1: TLabel
- Left = 25
- Top = 12
- Width = 76
- Height = 13
- Alignment = taRightJustify
- Caption = '&Input ArciveFile:'
- FocusControl = Edit1
- WordWrap = True
- end
- object Label2: TLabel
- Left = 19
- Top = 44
- Width = 90
- Height = 13
- Alignment = taRightJustify
- Caption = '&Output ArchiveFile:'
- FocusControl = Edit2
- end
- object Label3: TLabel
- Left = 44
- Top = 140
- Width = 65
- Height = 13
- Caption = '&DateAttribute:'
- FocusControl = ComboBox1
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label4: TLabel
- Left = 70
- Top = 108
- Width = 39
- Height = 13
- Caption = '&Method:'
- FocusControl = cboMethod
- end
- object Label5: TLabel
- Left = 8
- Top = 76
- Width = 101
- Height = 13
- Caption = 'Output Archive &Type:'
- FocusControl = cboType
- end
- object pbxLed: TPaintBox
- Left = 388
- Top = 80
- Width = 17
- Height = 25
- Hint = 'Click when red to cancel operation'
- ParentShowHint = False
- ShowHint = True
- Visible = False
- OnClick = pbxLedClick
- OnPaint = pbxLedPaint
- end
- object Label6: TLabel
- Left = 8
- Top = 176
- Width = 21
- Height = 13
- Caption = 'Log:'
- end
- object Edit1: TEdit
- Left = 120
- Top = 8
- Width = 189
- Height = 21
- AutoSize = False
- ParentShowHint = False
- ShowHint = False
- TabOrder = 0
- OnChange = EditChange
- end
- object BitBtn1: TBitBtn
- Left = 316
- Top = 8
- Width = 21
- Height = 21
- Caption = '...'
- ParentShowHint = False
- ShowHint = False
- TabOrder = 1
- TabStop = False
- OnClick = BitBtn1Click
- NumGlyphs = 2
- end
- object Edit2: TEdit
- Left = 120
- Top = 40
- Width = 189
- Height = 21
- AutoSize = False
- ParentShowHint = False
- ShowHint = False
- TabOrder = 2
- OnChange = EditChange
- end
- object btnSelectDir: TBitBtn
- Left = 316
- Top = 39
- Width = 21
- Height = 21
- Caption = '...'
- ParentShowHint = False
- ShowHint = False
- TabOrder = 3
- TabStop = False
- OnClick = btnSelectDirClick
- NumGlyphs = 2
- end
- object btnOK: TBitBtn
- Left = 349
- Top = 8
- Width = 76
- Height = 25
- Caption = 'OK'
- Enabled = False
- TabOrder = 8
- OnClick = btnOKClick
- NumGlyphs = 2
- end
- object CheckBox1: TCheckBox
- Left = 120
- Top = 166
- Width = 93
- Height = 17
- Caption = 'Inte&grity Check'
- Checked = True
- State = cbChecked
- TabOrder = 7
- end
- object btnClose: TBitBtn
- Left = 349
- Top = 71
- Width = 75
- Height = 25
- Caption = '&Close'
- TabOrder = 10
- OnClick = Exit1Click
- NumGlyphs = 2
- end
- object ComboBox1: TComboBox
- Left = 120
- Top = 136
- Width = 217
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 6
- Items.Strings = (
- 'FileDate'
- 'SystemDate'
- 'MaxFileDate')
- end
- object ListBox1: TListBox
- Left = 8
- Top = 192
- Width = 417
- Height = 137
- TabStop = False
- ItemHeight = 13
- TabOrder = 11
- end
- object cboMethod: TComboBox
- Left = 120
- Top = 104
- Width = 217
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 5
- Items.Strings = (
- 'Create new Archive'
- 'Add Files')
- end
- object cboType: TComboBox
- Left = 120
- Top = 72
- Width = 217
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 4
- OnChange = cboTypeChange
- Items.Strings = (
- 'BlakHole (.bh)'
- 'Cabinet (.cab)'
- 'Lha (.lha)'
- 'Zip (.zip)'
- 'Tar (.tar)'
- 'Tar Gzip (.tar.gz)'
- 'Jar (.jar)')
- end
- object ProgressBar2: TProgressBar
- Left = 8
- Top = 352
- Width = 417
- Height = 9
- Min = 0
- Max = 100
- Smooth = True
- Step = 1
- TabOrder = 12
- end
- object ProgressBar1: TProgressBar
- Left = 8
- Top = 336
- Width = 417
- Height = 9
- Min = 0
- Max = 100
- Smooth = True
- Step = 1
- TabOrder = 13
- end
- object StatusBar1: TStatusBar
- Left = 0
- Top = 364
- Width = 434
- Height = 19
- Panels = <
- item
- Width = 50
- end>
- SimplePanel = False
- end
- object btnCancel: TButton
- Left = 349
- Top = 40
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- Enabled = False
- TabOrder = 9
- OnClick = btnCancelClick
- end
- object OpenDialog1: TOpenDialog
- Left = 20
- Top = 205
- end
- object Arc2Arc1: TArc2Arc
- OnError = Arc2Arc1Error
- OutArcType = tyBh
- OnExtractActivate = Arc2Arc1ExtractActivate
- OnExtractDeactivate = Arc2Arc1ExtractDeactivate
- OnExtractBegin = Arc2Arc1ExtractBegin
- OnExtractEnd = Arc2Arc1ExtractEnd
- OnCompressActivate = Arc2Arc1CompressActivate
- OnCompressDeactivate = Arc2Arc1CompressDeactivate
- OnCompressBegin = Arc2Arc1CompressBegin
- OnCompressEnd = Arc2Arc1CompressEnd
- OnIntegrityActivate = Arc2Arc1IntegrityActivate
- OnIntegrityDeactivate = Arc2Arc1IntegrityDeactivate
- OnIntegrityBegin = Arc2Arc1IntegrityBegin
- OnIntegrityStatus = Arc2Arc1IntegrityStatus
- OnFileExists = Arc2Arc1FileExists
- OnProgress = Arc2Arc1Progress
- OnGetPassword = Arc2Arc1GetPassword
- OnNextVolume = Arc2Arc1NextVolume
- OnRemoveTempfile = Arc2Arc1RemoveTempfile
- Left = 89
- Top = 211
- end
- object BrowseDir: TdfsBrowseDirectoryDlg
- StatusText = 'C:\WINDOWS\Desktop'
- ShowSelectionInStatus = True
- Left = 56
- Top = 208
- end
- object FormCenter1: TFormCenter
- Center = True
- Left = 240
- Top = 200
- end
- end
-